home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The X-Philes (2nd Revision)
/
The X-Philes Number 1 (1995).iso
/
xphiles
/
hp48hor1
/
key.doc
< prev
next >
Wrap
Text File
|
1995-03-31
|
843b
|
34 lines
Author: ?
Purpose: ?
Here is the ->KEY routine made as short, and fast, as possible. C->KEY is
needed to create an on stack copy of ->KEY. It utilizes a SYSEVAL which
works by appending the binary integers. This version of ->KEY is written
similarly to the RPL routines found in the 48's ROM. An RPL dissassembly
follows of ->KEY.
C->KEY
(BYTES: #BFA5h 115)
%%HP: T(3)A(D)F(.);
\<<
# A06E9718AB212D9Dh
# D1A3BE06E9720B9h
# 312B05445040h 1 2
START # 5193h SYSEVAL
NEXT # 4003h SYSEVAL
# 62B9Ch SYSEVAL
\>>
02D9D begin RPL
18AB2 need one argument from stack
06E97 place next address on stack, do not call
20B9A rcl list
06E97 place next address on stack, do not call
1A3BE EVAL
0400D short integer <3h>
05445 ->program
0312B end RPL